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3 Version: *v04-000' 
-MCALL MFPR 
MPSWITCH = 1 
«NLIST CND 
«TITLE MPMCHECK = MACHINE CHECK EXCEPTION HANDLER FOR MP SECONDARY 
- IDENT ‘v04-000' 
~MARARBAAAAAAAAALALALLELLALEALELESELEL ELE SE EEE ESE EE EEE EEE EEE EEE EE EEC EEE ee aa 


COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT _GORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVE 


THIS SOFTWARE IS cyentanee UNDER A LICENSE AND MAY BE USED AND gt ht 
ONLY IN ACCORDANCE WITH THE TERMS OF SUCH arth ~~ he 7 Me 
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THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE 
oe kat itn NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
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; FACILITY: EXECUTIVE, ERROR HANDLING 
; ABSTRACT: IN A NUTSHELL, LOG IT AND TRY TO RECOVER. 


; ENVIRONMENT: RUNS ON INTER.U?T STACK AT IPL 31 UNTIL ERROR TYPE IS KNOWN 
: AND (IF POSSIBLE) CORRECTED, THEN RUNS AT SYNCH LEVEL 

; TO DO THE ERROR LOGGING. 

: EXECUTES ON SECONDARY PROTESSOR. 

; THE CONFIGURATION — CEXESGL CONFREG) IS VALID ONLY FOR THE 

; ti T FOR THE SECONDAR moreno T 

3 FOR THE MA780S. THE 

; 7 $ AMUST THE SAME T D AT THE SAME ADDRESSES 
: ON BOTH PROCESSORS. IN ORDER FOR BOTH PROCESSORS TO SHARE ONE 

; SYSTEM PAGE TABLE. 
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~SBTTL HISTORY ; DETAILED 
AUTHOR: RICHARD LARY , CREATION DATE: 6=-NOV-77 
; MODIFIED BY: 


v03-013 wMc0002 Wayne Cardoza 25-Jul-1984 
Add H memory to the tables. 


v03-012 wMC0001 Wayne Cardoza 14-Jun-1984 
Preserve cache state when panes machine check. 
Properly clear group 1 cache parity errors. 


V03-011 NPK3049 N. Kronenberg 10-Apr-1984 
ee up check for BRRVR reference from unibus 
interrupt service routine in CPTIMOUT. Test for 
PC as well as VA. 


: V03-010 RLRSBICONF Robert L. Rappaport 22-Mar-1984 
3 Test MMGSGL_SBICONF array elements for valid ayeten 
3 virtual address (high bit set) before using. lso 
3 correct error introduced by CONFREGL change. 

: V03-009 KPLO100 Peter Lieberwirth 10-Feb-1984 
: Change to use CONFREGL. 

; v03-008 KDM0053 Kathleen D. Morse 11-Jul-1983 


Replace spuespec itis IPR references with the new 
cpu-specific SPR780DEF symbols. 


v03-007 TCM0011 Tougy C. Matthews 24-Jan-1983 
Correct bug in MA7 Logging routine that checked for 
Bul giple Interlock Accep 
MA780 register. 


v03-006 KDM0040 Kathleen D. Morse 13-Jan-1983 
Change PRMSW to set tt and integrate into multi-processing 
code replacing CMP.SRCJMPMCHECK.MAR. Fix bug that referenced 
devices attached to primary (via CONFREG array) from the 
secondary processor's machine-check code. 


v03-005 RNGOOO0!1 Rod N. Gamache 15-Oct-1982 
Fixed code that enabled the MS780-E memory CRD (corrected 
read data) interrupts. Fixed code that re-enabled the MS/80-C 
CRD interrupts. 
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Additions to LOGERR_ROUTINES, LOGALL_ROUTINES, and ENAB_ROUTINES arrays. 


Note: Each invocation of this macro corresponds to one ‘'general'’ memory type. 
Each element in MEMTYPES List corresponds to one ‘‘specific’’ type. 


“MACRO MEMORY ROUTINES MEMTYPES ,LOGERR_RTN,LOGALL_RTN, ENAB_RTN 
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uae -SBTTL MEMORY_ROUTINES Macro 
: Macro MEMORY_ROUTINES 
: Build action routine vectors for different memory types. 
12 : Inputs: 
3 MEMTYPES - A List of "'NDTS_"* type codes for this controller. 
: LOGERR_RTN = Action routine that determines if an error was 
15 ; reported for this controller; if so, it logs it. 
3 LOGALL_RTN = Action routine to unconditionally log this 
; controller's Ng bapa 
; ENAB_RTN - Action routine to enable CRD interrupts for this 
19 ; memory controller. 
: Outputs: 


Create arrays to map a set of specific type codes to one general memory type. 
Note: Psects MCHKSDATAO and MCHKSDATA1 must be contiguous. 


- IRP MEMTYP ,MEMTYPES ; Repeat for each memory type... 


lf NDF ,MPSWITCH peeeee ONLY PRIMARY PROCESSOR... 
-PSECT MCHKSDATAO,LONG,WRT 3; Add s RAR Ss 4 entry to MEMTYP 
o1FF geeeee ONLY SECONDARY PROCESSOR... 
«PSECT YSMPDATAO,LONG,WRT 3; Add oges i ilentyae gate to MEMTYP 

NDC p*eene PRIMARY and SECONDARY PROCESSORS 


-BYTE MEMTYP 3 array. 

olf NDF ,MPSWITCH z;*eeee ONLY PRIMARY PROCESSOR... 

-PSECT MCHKSDATA1 ; Add gt PD 4 eatcy to MEMTYP 

oIFF p*eeee ONLY SECONDARY PROCESSOR... 
-PSECT YSMPDATA1 3; Add general-type enrty to MEMTY 

-ENDC j;*eeee PRIMARY and SECONDARY PROCESSORS 


-BYTE GENERAL_MEMTYP 
MEMTYPCNT = MEMTYPCNT + 1 
? GENERAL_RERTYP = GENERAL_MEMTYP + 1 
§ ; Now create action routine vectors. 
5 
; 


oo 
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0 5 i NDF ,MPSWITCH p*eeee ONLY PRIMARY PROCESSOR... 
5 -PSECT MCHKSDATA2,LONG,WRT ; LOGERR ROUTINES ervey: 
: : peeeee ONLY SECONDARY PROCESSOR... 
8 -PSECT YSMPDATA2,LONG,WRT 3 LOGERR_ ROUTINES orrey: 
59 -ENDC peeeee PRIMARY and SECONDARY PROCESSORS 
$9 «LONG <LOGERR_RTN-.> 3; Add self-relative offset to routine. 
66 lf NOF ,MPSWITCH peeene ONLY PRIMARY PROCESSOR... 
-PSECT MCHKSDATAS,LONG,WRT ; LOGALL_ROUTINES array: 
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YSMPDATA3,LONG ,WRT 
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MCHKSDATA4,LONG,WRT 
YSMPDATA4 ,LONG ,WRT 
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peeene ONLY SECONDARY PROCESSOR... 

; LOGALL ROUTINES 8 cere 

geanes PRIMAR Y and. SEC NDARY PROCESSORS 
3; Add sei tcoatantes offset to routine. 


seeees uy 4 yee PROCESSOR... 
3 ENA3_RO te i a ay? 
5 ENAB ONLY SECONDAR PROCESSOR... 


Seueet “PRIMARY e-’ "SECONDARY PROCESSORS 
3; Add self-relative offset to routine. 
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TROLLOR AND ERROR DEFINITIONS -SEP-1984 8F: 19:98 YOY SOR. SAE IACHICCKSS0.MARS 1 ° d) ve 
: ~SBTTL MEMORY CONTROLLOR AND ERROR DEFINITIONS 
; 3 Common error bit definitions. 
ARCS$V ELSRF = 28 sERROR LOG SERVICE REQUEST 
QO MRCSM_ELSRF = *x10000000 sWRITE TO CLEAR FLAG 
MRCSV_HERIMF = 9 sHIGH ERROR RATE IN MEMORY 
MRCSM_HERIMF = *x20000000 sWRITE 1 TO CLEAR FLAG 
MRCSV_INHBCRD = 31 DISABLES CRD INTERRUPT 
: MRCSM_INHBCRD = *x40000000 30 CRD INTERRUPT ENABLE, 1 CRD DISABLE 
§ 3; MA780-specific error bit definitions (in Array Error Register). 
8 MRCSV_INVMAPPTY = 31 s INVALID MAP PARITY ERROR 
ip MRCSM_INVMAPPTY = *x80000000 sWRITE 1 TO CLEAR THE FLAG 
$} 3 MS780E-specific error bit definitions. 
2g MRCSV_SUMMARY = 20 sERROR SUMMARY BIT 
44 MRCSM_SUMMARY = *x00100000 30R OF ALL ERROR BITS -- READ ONLY 
45 MRCSV_CTLIPTY = 19 sPARITY ERROR ON READ DATA FROM 
*$ MRCSM_CTLIPTY = *x00080000 sCONTROLLER 1 TO SBI INTERFACE. 
47 MRCSV_CTLOPTY = sPARITY ERROR ON READ DATA FROM 
48 MRCSM_CTLOPTY = *x00040000 sCONTROLLER O TO SBI INTERFACE. 
49 sFOLLOWING BITS ARE IN REGISTERS C & D 
50 MRCSV_MSEQPTY = 7 sMICROSEQUENCER PARITY ERROR 
51 MRCSM_MSEQPTY = *x00000080 3 
26 MRCSV_IFPTY = 8 sPARITY ERROR ON WRITE DATA FROM 
53 MRCSM_IFPTY = *x00000100 3SBI INTERFACE TO CONTROLLER. 
33 MRCSV_CRDERR = 9 sCORRECTED READ DATA ERROR 
33 MRCSM_CRDERR = = “x00000200 : 
3$ REENABTIME = 60*15 Hatt pe INTERRUPT ERROR LOGGING 
28 sEVERY MINUT 
59 SOMETIME = 60 3SCAN FOR NON-INTERRUPT ERRORS 
60 sEVERY 60 SECONDS 
61 CRDINTMAX = 3 ;MAXIMUM NUMBER OF INTERRUPTS A CONT 
¢ 31S ALLOWED WITHIN REENABTI 
63 CRDWATCHMAX = ;MAXIMUM NUMBER OF ERRORS TO BE LOGGED 
rt: sWITHIN REENABTIME 
06 H INCLUDED SYMBOL DEFINITIONS 
és SADPDEF sDEFINE ADAPTER CONTROL BLOCK SYMBOLS 
8 SEMBDEF <MC,SB,SE> sDEFINE EMB OFFSETS 
9 SIPLDE sPROCESSOR INTERRUPT LEVELS 
7 SMCHKDEF sDEFINE RECOVERY BLOCK MASK BITS 
7 SNDTDEF sDEFINE NEXUS DEVICE Es 
7 SPCBDEF sPROCESS CTL BLOCK 
74 SPFNDEF 3PFN DATA BASE 
75 spre 3 DEF INE PROCESSOR REGISTER NUMBER 
7 SPR780DEF sDEFINE 780-SPECIFIC PROCESSOR REGISTERS 
7 SPSLDEF sDEFINE PSL 
7 SPTEDEF ;PTE SYMBOLS 
7 SSSDEF DEFINE SYSTEM STATUS VALUES 
80 SVADEF sDEF IN PFN PITS 
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v04= MEMORY ACTION ROUTINE ARRAYS reer 138s Beh: 8 eyes eects etc ob0.maR:1 2? 
~SBTTL MEMORY ACTION ROUTINE ARRAYS 
0000 -PSECT YSMPDATAO,LONG,WRT 
MEMTYP: § 2d Been base of array of memory type 
3; codes. 
0000 -PSECT YSMPDATA2,LONG,WRT 
LOGERR_ROUTINES: 3; Define base of array :. ipetaboante to 
; log memories with error 
0000 -PSECT YSMPDATA3,LONG,WRT 
LOGALL_ROUTINES: 3; Define base of array of routines to 
; unconditionally log memories. 
0000 -PSECT YSMPDATA4,LONG,WRT 
ENAB_ROUTINES: ; Define base of array of routines to 


3 enable CRD interrupts in memories. 


: The following macro invocations add elements to the above arrays for each 
3; memory type. 


0000 MEMTYPCNT = 0 
0000 GENERAL_MEMTYP = 0 
MEMORY_ROUTINES - $780C ne Ts Mens ontroller. 
MEMTYPES=<NDT$ $ MEMONI nis. NAEMAI, NDT$_MEMI6NI,NDTS_MEM16I>, - 
LOGERR RIN = 6c, 
LOGALL~ = Log 
ENAB_ bene ENAB *m$780C 
MEMORY_ROUTINES - Nore MPR -_ My 
NDTS_ apa eeore MPM2,N m3>, - 


MEMTYPES=<NDTS_MPMO 
LOGERR_RTN = LOG MA/80, 
LOGALL “RIN = t OGRA 

ENAB_RTN = ENAB “MA?BO 


MEMORY_ROUTINES - 3; MS780E poner y controller. 
RERT Wreseoe Ty _MEM64NIL ,NDTS_MEMO64EIL ,NDTS _MEM64NIU, - 
NDT$_MEM64E1U,NDTS_MEM6 i 
NDTS_MEM25 NIL,NDTS_| MEM éeiL. NDTS -MEM256NIU, - 
NDTS_MEM spb 1U.NOTS. MEM2561> 
LOGERR_RTN = LOG_MS780E, - 


LOGALL-RTN = LOGE 
ENAB. RTN = ENAB ~m$7B0E 
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ORAGE -SEP-1984 04:10: SYSLOA. SRC JMCHECK780.MAR; 1 
43 -SBTTL LOCAL DATA STORAGE 
45 ; 
44 ; Macro that will define a global name of the form MPS$ if 
45 ; MPSWITCH is defined, else EXE$. It will also define a local name 
4g : to be used within this module. 
rt: -MACRO GBLDEF NAME 
4 IF DF ,MPSWITCH 3; For secondary processor only code... 
0 50 MPSS$'NAME':: 
1 FF ; For MCHECK780... 
8 § EXES'NAME':: 
-ENDC 
0 54 "NAME': ; For local use... 
2? -ENDM GBLDEF 
0 6 -PSECT SSSSMPDATA,QUAD,WRT 
00 62 ; The following symbol is defined for a transfer vectror in SYSLOAVEC 
00 63 ; This location is NEVER JUMPED TO. It is defined so these counters 
8 rt: 3 Can be located using a global symbol in the system map. 
00 08 GBLDEF MCHK_ERRCNT ;GLOBAL SYMBOL FOR SYSLOAVEC POINTER 
00 67 GBLDEF GL_CSBITA ;USED TO HOLD COMPLEMENT OF SBITA 
00000000 00 68 -LONG 0 
00 3 GBLDEF GL_CHIOLD ;TIME OF LAST CACHE ERROR 
00000000 8 0 > 0 
0 71 GBLDEF GL_CH20LD ;TIME OF NEXT=TO=LAST CACHE ERROR 
00000000 00 iG; el 0 
00 73 GBLDEF GL_CPTIMOUT ;TIME OF LAST CP TIMEOUT/SBI ERROR 
00000000 3 74 uy 0 
0 75 GBLDEF AB_MEMERR ;ERROR COUNTERS FOR 16 ADAPTERS 
00000020 00 6 .BCkKB 1 
0000 GBLDEF GU_REENAR | . 0 ;REENABLE TIMER 
0 8 GBLDEF GW_WATCH 3SCAN MEMORY CONTROLLER TIMER 
0000 00 80 «WORD 0 
00000000 5 e GBLDEF en, . 0 ;COUNT OF CORRECTED MEMORY ERRORS 
: GBLDEF GL_CHSTATE ;CURRENT STATE OF CACHE 
00200000 se .LON *x200000 
0 5 GBLDEF GL_BADTIMOUT ;TIME SINCE LAST BAD MCHK CODE 
00000000 6° 58 -LONG 0 
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D.10 
INT ANOLER FOR MP ISTSEP=1986 04:10:09 ES¥SLOR. SREIACHECK 780.MAR: 1 


“ser Th MACHINE CHECK ENTRY POINT 
~PSECT YYSMPCODE,QUAD,RD,WRT 


soa Bs y ENTRY POINT = SCB VECTOR POINTS HERE. 


Pa MF 
” (3) ve 


IPL * 
.ALIGN LONG A VECTOR MUST HAVE LONGWORD ALIGNMENT 
MCHK TEITHER EXESMCHK:: OR MPSSMCHK 
PUSHL #MCHKS$M L0G, :MASK WORD FOR PRTCTEST 
PUSHAL MCL_PC+Z(S ‘PC,PSL POINTER FOR PRICTEST 
PUSHR #°MZRO,R1 Re. R3,R4,R5, APS 
ADDL3 ac9ea>. SP; A ;POINT AP TO LOG FRAME ON STACK 
SALL INTERRUPTS ARE LOCKED OUT! 
MFPR  #PR780$_SBIMT,RO GET CURRENT CACHE STATE 
ASHL = #= cHSY REPLG1.RO,RO ‘POSITION THE CACHE CONTROL BITS 
INSV R08 CHSV REPLG1 .= ‘SAVE THE CURRENT CACHE CONTROL BITS 
Cee ORTROL w°GL_CHSTATE 
MTPR acH SFEbAIR #PR780$-SBIMT ;FORCE MISSES AND GROUP 0 REPLACE 
ALLOW SBI 19 INVAL IDATE CACHE 
BICB3 #*XFO, MCL _SUMMARY (AP) , ~(§p) :GET Cow 4 BITS OF TYPE CODE 
sBREAKOUT TYPE CODE 
CPTIMEOUT,- :CPU if MEQUT/SBI AERROR CONFIRMATION 
CSPARITY - SCONTROL STORE PARITY ERROR 
TBUF PARITY, i TRANSLATION SUFFER PARITY ERROR 
(ReHEPRAITY = [CACHE PARITY ERROR 
BADTYPE ‘THIS CODE DOESN'T EXIST 
READSUBST,- SREAD DATA SUBSTITUTE (MEM READ ERROR) 
TEROATHE CK, = ‘“CAN'T GET HERE’ ERROR FROM INST ROMS 
BADTYPE,- 
BADTYPE 7 
BADTYPE,- 
TBUFPARITY,- ;IB-DETECTED TBUF ERROR 
BADTYPE,- 
READSUBST,- sIB-DETECTED MEMORY ERROR 
CBTIREQUT, - :IB-DETECTED TIMEOUT OR SBI ERROR CONF 


BADTY 
CACHEPARITY>, TYPE=B ; IB-DETECTED CACHE PROBLEM 


MTPR “SL CHSTATE, #PR780$_SBIMT RE-ENABLE THE CACHE 
BISL NCHS =4 (AP) sMASK FOR PRICT 

PUSHL reavet mOUT “TIME OF LAST BAD TYPE FAULT 
MFPR #PR7B a0 Toor we SL spADTIMOUT j TIME oF CURRENT FAULT 
(SP + eWEGL _BADT COMING TO FAST? 

BNEQ DaRPUTAT ives. ABORT 


POPR #*M<RO,R1,R2,R3,R4,R5.,A 
SECBUG_CHECK MPBADMCK, PATA 7BAD MACHINE CHECK CODE 


MPMCH = MACHINE CHECK EXCEPTION HANDL ER ede o np 16-SEP=1 AX/VMS Mac - Page 10. 
04- TRANSCATION BUFFER PARITY CRRDE gree em TFRs BE 1b88 Lees eects Mee feo mans 2% 18, 
AE 44 .SBTTL TRANSLATION BUFFER PARITY ERRORS 
AF 451.:«TRUFPARITY: 
33 9028" F DA OOAF 4 MTPR ss W*GL CHSTATE, #PR780$_SBIMT ;RE-ENABLE CACHE 
9 DA 4 4 MTPR 4#0,#PRS_TBIA sCLEAR ENTIRE TBUF 
FC AC C8 008 4 4 BISL PRCHK EAT “MCK <4 (AP) [SET MACHINE CHECK CODE FOR PRTICTEST 
pa 4 6 
BB 457 TRYRESUME: 
04 AC O1F0 BF B3 4 : #*X1FO,MCL_SUMMARY(AP) ;1S ERROR ABORT OR TIMEOUT PENDING 
C1 459 DAMPUTATE: 
if ff C 460 BNEQ § AMPUTATE ;BRANCH IF YES, NO HOPE OF RESUMING 
04 ac 08 9 C3461 BITB #8 MCL_SUMMARY (AP) 3SEE_IF ERROR WAS 1B ERROR | 
12 o¢ 46¢ BNEQ § TIF WE CAN "DEFINITELY RESUME 
 - cB 9A 0009 46 MOVZBL @MCL_PC(AP),-(SP) “GET DE FOR RESTARTABILITY CHECK 
1F OS2D'CR BE €1 O0CD 464 BBC (SP)%,W°RESUMABLE,AMPUTATE :BRANCH IF INST NOT RESUMABLE,ABORT 
OD3 465 108: =; THERE IS A LOW PROBABILITY CASE HERE T 
OD 466 [CONTINUE WHEN WE CAN'T = IF A LOCATION IS REA THE 10 
0003 46 SA IDE AFFECT WHICH MODIFIES THAT LOCATION, THE INSTRUCTION IS 
00D3 468 SNOT RETRYABLE, A SOFTWARE SOLUTION IS TO IMPLEMENT A FLAG SET BY ANY 
00D 469 i POTENTIAL REFERENCE T TO THE 10 PAGE THAT MAY CAUSE A SIDE AFFECT. 
0003 = 470 [BBS #IOSAFLAG,FLAG,AMPUTATE ;BRANCH IF INST MAY OF HAD SIDE AFFECT 
0003 471 RESUME: 
53 02 B80 00D 47 MOVW #EMBSK_MC,R3 ;SET TYPE OF LOG ENTRY 
O16E 30 0006 47 BSBW LOGGER” [WE'RE GOING TO MAKE It - LOG ERROR 
103F 8F BA 9009 474 POPR  #*M<RO,R1,R2,R3,R4,R5,AP> ;RESTORE REGISTERS 
SE 08 CO O0DD 475 ADDL  #8,SP sREMOVE PRICTEST STUFF FROM STACK 
SE BE OC Q0E0 476 ADDL  (SP)+,SP [POP HARDWARE LOG FROM STACK 
02 O0€3 477 REI [AND TRY AGAIN 


Ef MODE WE WERE EXECUTING IN 
ROTL § #PSLSV_PRVMOD,4(SP), (SPS sCREATE A PSL OF CURRENT TO 
TKER RNEL WITH CORRECT PREVIOUS MODE 
SAS FROM A FAULT, O°S IN REST OF PSL 
SETIPL #IPL$_SYNCH SLOWER IPL, ENABLING INTER-PROC INT. 


04 AE O4 AE 16 8 


10 
MPMCHECK = MACHINE CHECK EXCEPTION HANDLER FOR MP Ig-Se EP- = 1984 02: 11: 08 YAX/VMS Macro 4-09 Page 11 
- UCTION - : YSLOA. K A 
v04 ERRORS DETECTED IN INSTRUCTION DECODE RO 5-SEP-1984 04:1 SYSLOA. SRCJMCH wee 0.MAR;1 (9) 
4 479 .SBTTL ERRORS DETECTED IN INSTRUCTION DECODE ROMS 
£4 4 -SBTTL CONTROL STORE PARITY ERRORS 
£4 4 
cE 4 : IBROMCHECK: 
£4 483 CSPARITY: 
33 0038" CF DA O0E4 484 MTPR  W°GL_CHSTATE,#PR780$_SBIMT ;CACHE PROBABLY ox - - ofNABLe IT 
06 AC 2c BC 29 OE 485 MOVB @MCL~PC(AP),MCL_SUMMARY+2(AP) ;SAVE OPCODE IN 
FC AC C ; 4 $ imeatanial SLs #MCHRSM SACK oS ERP) 7SET wisn” CODE FOR ERTETEST 
53 02 80 oF 488 Ovw #EMBSK _MC,R3 :SET TYPE OF LOG ENTRY 
O14F F5 489 BSBW GGER™ G THE ER 
09 30 ac «619 «#2€O OOFB 4 p BBS rity V_CURMOD+1 ,MCL PSL CABS REFLECTCHK ;BRANCH IF 
FD 49 ALLURE IN USER OR SUPERVISOR MODE 
103F 8F BA borD 138 POPR #*M< R3,R iB AP> sRESTORE REGS 
a8 498 SECBUG_ checRe Rh Re. HECK, sMACHINE CHECK IN KERNEL OR EXEC MODE 
106 02 ; 
O96 i : THIS CODE FOLDS UP A PROCESS AND HANDS IT BACK TO THE PRIMARY, 
0106 4 ; FORCING IT TO EXECUTE IN THE EXCEPTION HANDLER. THIS IS DONE BY 
0106 05 : REMOVING ALL TRACES OF THE INTERRUPT FROM THE SECONDARY 'S INTERRUPT 
0106 $ : STACK, AND PLACING THE APPROPRIAT AND PSL PAIRS ON THE P 
bide 8 : KERNEL STACK. THEN A NORMAL RESCHEDULE REQUEST IS MADE BY THe SECONDARY. 
0106 8 REFLECTCHK: 
106 511 MFPR #PRS$_KSP,RO :GET THE KERNEL MODE STACK POINTER 
70 2C ac 7D 0109 B18 MOVQ  MCL_PC(AP),-(RO) S INTERRUPT PC,PSL TO KERNEL STACK 
10051 :1T IS NOT NECCESARY 16 PROBE KERNEL 
0100 514 SSTACK FOR VALIDITY, THE FAILURE WILL 
0100 515 ‘BE A KERNEL STACK NOT VALID BUGCHECK 
010D 316 [FROM WITHIN MACHINE CH 
00 SO DA 010d 51 MTPR RO, #PRS_K SREPLACE THE NEW KERNEL STACK POINTER 
103F 8F BA 0110 518 POPR #*M<RO, Ri SR2. R3,R4,R5,AP> *RESTORE REGIST 
SE 08 cO 0114 519 ADDL # SCLEAR PRICTST STUFF 
SE 6 BE )«=CCOs«é0117 0 ADDL (SP) + :POP HARDWARE LOG FROM STACK 
6E  00000000'GF SE O1IA 1 MOVAB G ExESnc CHECK, (SP) ‘SET UP A PC AND PSL FOR EXCEPTION 
06 AE O04 AE O02 18 «EF oi 1 2 : EXTZV #PSLS$V_CURMOD .#PSLSS_ CURMOD 4(SP) ,4(SP) 
01 2 4 
o1 E 5 
12£ 6 
012E 0 
0131 1 
or 1 5 
131 6 


FECC’ 31 BRW MPSSMPSCHED2 RETURN PROCESS TO PRIMARY 


6 10 
MPMCH = MACHINE CHECK EXCEPTION HANDLER FOR MP 16-SEP-1984 02:11: AX/VMS Mac Page 1 Mf 
v04= CACHE BNE fy ER ERROR g: geen 88e g 14:98 SYSLOA.SRCIMCH MeeK 80. MAR; 1 ° ats vC 
4 is .SBTTL CACHE PARITY ERROR 
4 4 CACHEPARITY: sENTER WITH CACHE DISABLED REPLACING 
FC AC 02 cs 134 rk BISL wCHKSH MCK,<4(AP) SSET MACHINE CHECK TYPE FOR PRTICTEST 
1 BC 138 | 544 TSTB @MCL_VATAP) “FORCE DATA INTO GROUP 0 OF BAD CACHE 
33 0021A000 BF DA 1 45 MTPR = #CH LALPAIR 1,#PR780$_SBIMT ;NOW FORCE GROUP 1 REPLACEMENT AND 
10 BC 495 «(014 46 TSTB C VACAP sFORCE GROUP 1 OF BAD LINE TO GOOD DATA 
14 4 MFPR #PR?B0$_TODR,-(SP) [GET TIME-OF-YEAR IN 10MS TICKS 
7E «OE 9008" F C3 01 48 SUBL3 W*GL_CH2OLD,(SP),-(SP) :GET TIME SPAN OF LAST é ERRORS-NOW 
A 8E 01 01 4 CMPL. (SP), #CH_ THRESHOLD SARE THE ERRORS HIDEL 
5 1A (01 BGTRU 2 “BRANCH IF YES OnG1 ve Acer CACHE 
0000007F BF 24 AC 07 ED 01 CMPZV #CHSV_GOERRS,#CHSS_GOERRS ,MCL_PAR ITYLAP) 0 a 11 
19D ifs GROUP 0 ALL 600D? 
11 12 19D BNEQ 108 iBR RANCH IF GROUP 0 As BAD 
0029'CF CO 8F 19F 554 BISB #CH_MISSG1!CH_REPLGOa-8 _CHSTATE+1 ;DISABLE GROUP 1 
0029'CF 9 A 01AS 555 BICB #CH"REPLG1a-8,W*GL easTATEST” : CANNOT Fokee REPLACE IN BOTH 
7 AC 0 90 TAA 36 nove #CHCOG_D1SABI MCL L_SUMMARY+3(AP) ;LOG THAT WE DID IT 
0029'CF 0120 8F AB 180 58 10$: BISW #CH_MISSGO!CH_REPLG1@-8,W*GL_CHSTATE+1 ;DISABLE GROUP 0 
0029'cF 40 ar BA 187-559 BICB #CH-REPLGO@-8-W*GL CHSTAT TE+1” :DON'T T FORCE — REPLACE IN BOTH! 
07 ac 6010 «90 «(01BD «Ss «4560 MOVB #CHCOG DISAB xMcL SUMMARY + (AP) ;LOG THAT WE DID IT 
0008'CF 0004'CF DO 0O1C1 561 20$: #§ MOVL  W*GL_CRIOLD,W*GL CH2OLD ;MAINTAIN THE TIMING HISTORY 
0006'CF 8E DO ice 36¢ MOVL (sp)# W°GL_CH10L T HIRD GENERATION 
33 ©0028'CF DA 10D 56 MTPR L eCHSTATE, #PR780S_ SBIAT ; :RE-ENABLE T HE CACHE = FINALLY 
FEE6 31 O1D2 564 BRESUM: BRW WRVRE sSEE IF WE CAN CONTINUE FROM THE ERROR 


MPMCHECK MACHINE CHECK Ext PT1ON HANDLER wt MP 16-SEP-1984 02:11: AX/VMS Macro v04 Page 
V04 CPN IMEOUT 7 $01 ERROR CONT IRRAT TON Rr SEE TRE BE:1:98 HAN VOS Macc Woe Oe man:1 em city 
p .SBTTL CP TIMEOUT / SBI ERROR CONFIRMATION 
1D CPTIMEOUT: 
< 928° cr DA 01D MTPR = W*GL gUSTATE E.#PR780$ SBIMT :ENABLE THE CACHE 
6 C8 1DA BISL § #MCHRSM_MCK!ACHKSM_NEXM,-4(AP) ;SET TYPE FOR PRICTEST 
OOOC'CF OD ODE 607 PUSHL wel cert WE ONLY KEEP TRACK OF ONE TIMEOUT 
1 é : MFPR #PR7BOS 1oDk ran a(PTiMoUt jUPDATE THAT HISTORY 
OOOC'CR 8E 01 CMPL  (SP)+,W®GL_CPTI ARE TIMEOUTS LESS THAN 10 MS APART? 
AG 12 C 610 BNEG BRESUM ‘BRANCH IF NOT TO TRY AND CONTINUE 
FEC] 31 9 f 611 BRW AMPUTATE SOTHERWISE SOMETHING IS VERY WRONG 


1 10 
MPMCHECK = MACHINE CHECK EXCEPTION HANDLER FOR MP 19-SEP-1984 02:11:08 VAX/VS: Macro V04- 90 Page 14 
v04= READ DATA SUBSTITUTE ERROR =SEP=1984 04:10: SYSLOA. SRC. JMCHECK780.MAR; 1 (12) 
631 .SBTTL READ DATA SUBSTITUTE ERROR 
1 é : .ENABL LSB 
1 4 READSUBST: 
33 0028'CF DA 1 635 MTPR —s W°GL CUSTATE, ,WPR780$_SBIMT ;REENABLE CACHE 
FC AC. O02 CB 6 6 é BISL  #MCHR <4 (AP) "SEf MACHINE CHECK TYPE FOR PRTCTEST 
sic aC D A 6 MOVAL MCL PC CK P) a ;SET POINTER TO PC,PSL 
53 0 : 6 8 MOVL #EM ask HE ,R3 ‘SET HARD MEMORY Faron TYPE 
018E 41 6 BSBW LOG ERROR. “MEM ‘LOG MEMORY ERRO 
FEAR «031 «(0244 = 641 BRW MPOTA tABORT == RECOVERY IS USELESS 


v¢ 


J 10 
MPMCH = MACHINE CHECK EXCEPTION HANDLER FOR MP 16-SEP-1984 02:11: AX/VMS Macro V04- Page 15 MP 
vet INTERFACE FROM MACHINE CHECK HANDLER TO mets be: 19:58 Yee OR. SAC RICMIE CK SSO. MAR: 1 9° 43) v0 
if .SBTTL INTERFACE FROM MACHINE CHECK HANDLER TO ERROR LOGGER 
rhs 5 ; LOGGER = Routine to log Machine Check interrupts and aborts 
4? 4 > INPUTS: 
47 : : R3 - Error Log type 
47 737; AP = Pointer to Machine Check error log frame 
er. C7 8 : -4(AP) = MASK FOR PRICTEST 
f iS 3 -B8(AP) = PC,PSL POINTER FOR PRICTEST 
47 i : OUTPUTS: 
47 743: Entry made in error log conditional on PRICTEST 
47 744; RO-R5 destroyed 
ne 
0 47 rs LOGGER: 
54 08 6C C1 0247 748 ADDL3 MCL_COUNT(AP) ,#<2%4>,R4 ;GET SIZE OF ENTRY IN BYTES 
55 04 AC SE 0248 749 MOVAB MCL~SUMMARY (AP) ,R5 [GET ADDRESS OF ENTRY 
51 FRAC 7D 0 4F = 750 mova = R 'GET MASK AND PC POINTER FOR PRICTEST 
00000000'GF 06 0253 755 INCL  G*EXESGL_MCHKERRS [KEEP COUNT OF MACHINE CHECKS 
0259 136 10$: tFALL THROUGH TO LOGIT’ 
$589 P88 ++ 
0 39 139 : LOGIT = INTERFACE TO SYSTEM ERROR LOG 
0 39 76 : INPUTS: 
0 59 763: R1 = PC,PSL POINTER FOR PRICTEST 
59 764: Re = MASK FOR PRICTEST 
59 «765: R3 = ERROR LOG TYPE 
59 766 : R4 = SIZE OF LOG ENTRY IN BYTES 
59767: R5 = ADDRESS OF LOG ENTRY 
39 168 ; (SP) = RETURN ADDRESS 
39 20 . .ENABL LSB 
59 7 LOGIT 
0259 77 MFPR #PR780$_SBIFS,RO :GET SBI FAULT/STATUS REGISTER 
0050 19 €5 025¢ 77% BBCC #SBIFSSt NEF ,RO, 10 [CLEAR NESTED ERROR FLAG 
30 50 DA 0260 775 10$: MTPR RO,#PR780$_SBIFS ‘WRITE IT BACK TO CLEAR SILO LOCK 
6 176 SAND FAULT LATCH 
6 di MFPR —- #PR780$_ SBIER RO “GET SBI ERROR REGISTER 
50 70CO 8F a8 é £8 BISW #SBIERSA_IBTO!SBIERSM_IBRDS!SBIERSM_CPTO! SBIERSM_RDS!- 
68 77 SBIERSM ERD RO ;SET BITS FOR ERRORS WE'RE HANDLING 
34 50 DA 0268 780 MTPR  RO,#PR780$_SBIER ‘WRITE IT BACK TO CLEAR LATCHES 
ee 
GE , 5 MCHKSGL_LOG: : 
51 54 10 C1 $ 789 ADDL3 #EMBSB_MC_SUMCOD,R4,R1 ;ADD SPACE FOR HEADER FOR BUFFER SIZE 
00000000'GF 16 , 194 JSB G*MPSSALLOCEMB :GET AN ERROR LOGGING BUFFER 
14 59 E9 0278 79 BLBC RQ.208 :BRANCH IF DIDN'T GET IT 
DD 0278 798 PUSHL R [SAVE ADDRESS OF ERROR LOG BUFFER 


vor=000" INTERFACE FROM MACHINE. ¢ 


"TE W E 
00000000'GF 16 $ 
6 208: 


K 
ne HENOLER ERB OF SSE ISBS 82:15:98 HAYGUGR.SRESACHECKIBo.mans1 P29" 18 
MOVW ft Ae MC_ENTRY(R2) vi NTRY TYPE TO FAULT TYPE 
move Ya =F SUMCOO (RS POINTER 10 10 BUFFER START IN R2 
; INDICATE BUFFER READY TO LOG 


sEXIT WITH HARDWARE LOG STILL ON STACK 


JSB o-nPseneLEASere 


=~ 
mn 
wo 


-DSABL LSB 
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MPMCHE CK 4- 
V04= SYSLOA. SREIMCHECKTSO.MAR; 1 (15) 
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P P>Prrrr?r FP OOOOODOOOVOOOVOOOOOOOOOOOO 
NE FFL EWTMNS FS VNNOQOCOOOCOCOCOCOCOOCOOoOoOoOoOOoOOo Omrm©®n 
0.00.69 00 00 6d Od Cd Cd Gd Cd Cd C9 GS 09 CD OD OD OD Cd Cd G9 Od Cd Od CD OD CD OD C9 Cd Cd 09 09 CD GD CD CD CD CD Co CD CD CD CD CDCDOD 4 
DEPP Be BP BE BB BEE EE IIIA II PRPOPOPOPPPNNNIY 2 OO 
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i -SBTTL SBI ERROR INTERRUPTS 
: Handle SBI Faults and Asynchronous Write Timeouts on the SBI. 


SBI Fault: 
Log the error; try to resume normal execution. 


Asynchronous Write Timeouts: 
Log the er 


ror. 

Se up a ‘‘fake’’ machine check log on the stack. This is so we 

can share the exception exit path (REFLECTCHK) that machine checks 
take if the current process is gzecut tne in USER or SUPER mode. 

If the current process is in EXEC or KERNEL mode, bugcheck. 


AL LGN LONG sTHIS IS VECTORED TO 
C ;SBI FAULT VECTOR 


ee 
a8 
oo 


IPL #*x1 


F DISABLE ALL_ INTERRUPTS 
PUSHR #*M<RO,R1,R2,R3,R4,R5,R6,R7> . te WORK REGS 


MONA UE WIN SO ONAN WI © OO NAME WN O OO NAME AN (OOOO WwW 
wv 
o 
uv 
po) 


SOOCCOSOOCOCOSOSOOOSOSOOOSOOSOSCSCOSOSOSOOOSOCOOOO SOOO OCOOOOOOOOOOOOO 


OOFF 8F BB 
98 04 9A MOVZBL #EMBSK BE Rg LOG 
5203 00 MOVL  #MCHKSP_MCK'MCHKSM_LOG,R2 ;MASK FOR PRTCTEST 
28 BSBB UCL sUSE SAME CODE AS ASYNC WRITE FAILURE 
OOFF BF BA #°M<RO,R1,R2,R3,R4,R5,R6.R7> | RESTORE RO-R7 
02 El STRY TO CONTINUE 
ALIGN LONG :THIS IS VECTORED TO 
GBLDEF iNT6 SASYNCHRONOUS WRITE TIMEOUT 
GBLDEF LOGAWE 
SETIPL #*X1F :DISABLE ALL INTERRUPTS 
OOFF 8F BB PUSHR #*MCRO,RI.RZ.RS-RGRS-ROR >  sSAVE SOME WORK REGS 
5 07 9A MOVZBL #EMBSK AW.R *ERROR LOG TYPE 
52 07 «DO O2AE MOVL  #MCHKSA_LOG!MCHKSM_MCK!MCHKSM_NEXM,R2 ;PRTCTEST MASK 
A 10 0281 BSBB SUSE SAME CODE’ AS SBI FAULT ERROR 
QOFF F BA B3 POPR #*M<RO,R1,R2.R3,R4,R5,R6,R7>  _ ; RESTO - 
E 28 C2 028 SUBL #40,SP SALLOCATE FAKE MACHINE CHECK FRAME 
8 DD O2BA PUSHL #40 SIZE OF FRAME 
07 DD O2BC PUSHL #MCHKSM_MCK!MCHKSM_LOG!MCHKSM_NEXM 
O AE ODF O2BE PUSHAL MCL pcek SP sMASK”AND PC,PSL FOR PRICTEST 
103F 8F BB 02C1 PUSHR #*MZ2RO,R1,R2,R3,R4,R5,AP> ;SAVE REGISTERS FOR COMMON CODE 
5¢ 5E e4 C1 02¢5 ADDL3 #<9#4>.SP_AP -p AP TO FAKE MACHINE CHECK FRAME 
0003'cF © AO BF 93 02C9 BITS #*B10100000,w*GL_CSBITA+S ;WAS WRITE IN USER OR SUPERVISOR 
CF 3MODE AND NOT UPDATING A PAGE TABLE 
93 12 CF BNEQ 10% [IF NOT, MUST BUGCHECK 
FE x D! a BRW REFLECTCHK [BRANCH IF OK TO CONTINUE 
103F 8F BA 02D4 POPR #*M<RO,R1,R2,R3,R4,R5,AP> 
D8 SECBUG_CHECK MPASYNCWRT.FATAL;WRITE ERROR IN KERNEL OR EXEC MODE 


p++ 
; LOGSBI == Subroutine to log SBI errors. 


: Implicit Inputs: H 
+ (SP) 
+ 


- R? 
: 


Create an SBI error tog buffer that contains: 
e contents of the confi auras jon register of every MA780 
SBI adapter on the bus or 0 (16 SOngueree? « 
A copy of the SBI silo (16 Longwords) 
SBI processor registers SBITA, SBIER, *SBIMT, SBISC, and SBIFS. 


iogser: ;LOG SBI ERROR 
INCL G*EXESGL_MCHKERRS ;KEEP COUNT OF MACHINE SHECKS 


MOVQ <9%4>(SP),-(SP) :MAKE A SECOND COPY OF PC,PSL 

MOVL § G*EXESGL_CONFREGL,R7 ; ARRAY Y OF NEXUS DEVICE TYPE CODES 

MOVL § G*MMGSGL"SBICONF ,R5 TARRAY OF ADAPTER V 

#15,R0 S INDEX OF LAST SOSSIBLE ITEM ON SBI 

10$: CLRL = BS Z ASSUME NO ADAPTOR HERE 

MOVL CRE) EROD RI [GET VA OF CONTROLLER/ADAPTER 
BGEQ 208 [GEQ IMPLIES NO VALID SYSTEM 
TTL (R7) CROJ ;TEST ADAPTER TYPE (ONLY WORKS Mor SB1) 


Q0000000'GF 06 


Ww 
wn 
ad 


7E_ 24 AE 
7 Q0000000'GF 00 
5  Q0000000'GF 00 
51 6540 Dd 
1¢ 


6740 D 
7 #1 


5 
5 


F EQL, NO ADAPTOR HERE 


HAAN. A AAA. A AAAI A AAA AAAI AAP POPIPIPOPOPUNPININYINIPOPOPYPYPIPIPIPOPYPIPOPIPIPUNIPOPIPININY so DW 
ovo 
LJ 
WDOODOODOODOODOOOOOO0O0000000000000000 000000000 09 00 00 C9 00 C9 CD CD ON CD CD CD CD CO CD CD CD CDODCD 


FEE FWWMMAIRIININIIIN | | |= =DOOCSCSCCCO TA HAMMMMOVTOTOVVVTVVTS 


RAAT III — — 2 2 — — OOO OSSSOOOO OOOO O00 0 000 SII MO 
DEAN OOD NAME WN OO NAME WIN OD NAAE WIN OO EWN CDW OODNOUL UIC WK 
= 
=) 
< 
rc 


=] 
So 
SOOOOOOCOOOCOOCOOOOCOOOCOOOOOOOOOSOOOCOOSSCOOOOCOOOCOOOOOOOOOOOOOOO w2xt 


DOA $F OO WOT DWUMPIV MNO ONS MAMNVIVIWOM SP OUIMVIWWOOCVCVVVTVTVTVTCS 


DT$_MP 
ASSUME <NDTS“MPHOs > ED NOTE pens 
00000040 8F 6740 01 CMPL CRTIEROD, #NDTS_MPMO :1S THIS AN MA780? IF NOT, TH 
D «OF BLSSU : THE SECONDARY CANNOT TOUCH iT as 
00000043 8F 6740 01 CMPL = (R7) CRO], ANDTS_MPM3 : 1/0 SPACE IS DIFFERENT THAN ON THE 
03 «(1A BGTRU : ON THE PRIMARY (ONLY MA780S ARE SAME). 
6 61 DO MOVL  (R1),(SP) [STORE ADAPTOR CSRO ON STACK 
09 50—sF4 20$: SOBGEQ RO,16$ ‘LOOP THRU ALL POSSIBLE 16 
50 OF 00 MOVL #15,R0 iSET UB COUNT OF NUMBER OF TIMES TO 
30$:  MFPR  #PR780$_SBIS,-(SP) SSAVE INFORMATION FOR ERROR LOGGER 
FA 50 F4 SOBGEQ RO ; es ‘LOOP THRU ALL 16 
FPR ss #PR O$ SBITA,-(SP) :SAVE SBI TIMEOUT REGISTER 
QO00'CF 6E D2 MCOML (SP),W*GL CSBIT :SAVE COMPLEMENT SBITA FOR LATER CHECK 
FPR #PR? Os SBIER,~(SP) [SAVE SBI ERROR REGISTER 
MFPR = #PR780$"SBIMT.-(SP) [SAVE SBI MAINTENANCE REGISTER 
MFPR = #PR7 . SB15¢.~ (SP) : SAVE SBI SILO COMPARATOR 
MFPR = #@PR7 SBIFS (SP) AVE SBI FAULT/STATUS REGISTER 
7E 009C BF 3C MOVZWL pehoetets #454<784>, “(shh sSAVE NUMBER OF BYTES OF ENTRY 
51 0098 CE DE MOVAL <<16#4>4#<164>+<624>>(SP),R1 : ADDRESS OF PC.PSL FOR PRICTEST 
4 6€ OD MOVL = ¢ sh OF BYTES TO LOG 
55° 04 AE 9F MOVAB 4 (SP5,R5 SADDRESS OF LOG ENTRY 
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ry 3 § BSBw Logit sCALL_ ERROR LOGGER 
5E E 3 ADDL SP)+,SP CLEAN STACK OF LOG AND FAKE PC,PSL 
ee 3 RSB 7RETURN 


row lf 


_ 
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ma 
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REENABLE_INTS: 
BECwW 


SIS DE PAA AA MII te 
OOWDWNA WNL WN $$ S OONOAUE WIN OS OONAUE WH OODON— OX 


FMM TPS WNIDNVOONUWWAS MMDOUIW— MP PPP PPOLLLLSS Mm 
WDOOOOO0O0O0O0O000000000000000000000000000 


B11 
pyreerr ton HANDLER FOR MP 197 3b = 138% pe 14:98 yaniv Macro 


~SBTTL MEMORY TIMER SCAN 
MPSSREENABLE: : 


DECW W*GW_ WATCH 
BGTR REENABLE_INTS 


MOVW # 
#*ACR 
=(SP) 


B 0$ 

MOVAL (SP),R1 

MOVL  #EMB$K_SE,R3 
BSBW LOG_ERROR_MEM 


#8,SP 
POPR #*M<R1,R3> 


EC W*GW_REENAB 
BGTR  10$ 
MOVW #REENABTIME,W* 
PUSHR #*M<RO,R1,R2,R 
MOVCS  #0,#0,40,416,W 
BB SHEXESV 
G*EXE 


Se te Ge Ge Ge Fe Ge Ge Se Ge 


Reset 16 b 


See eae re MeCKTBO.MAR:1 oe” (45) 


; Define timer scan entry point. 


3; Count seconds down. 
; Br if time hasn't elapsed yet. 


; Scan all memory controllers for unreported errors. This will yield a 
3; representative sample of memory errors in the erro, ‘og, even if CRD 
: interrupts are disabled. 


ew 
1,R5> 


Reset time satoryer . 
Save working re 

Set up interrupt PSL. 

Fake interrupt PC on stack. 
Point to exception PC,PSL. 

Log soft memory errors. 

Scan all memory controllers, and 
log any that report errors. 

Pop PC,PSL pair from stack. 
Restore registers. 


; Count seconds down. 


Branch if reenable time not elapsed. 
Reset the time interval. 
Save work ing registers. 

es of error count to 0. 
Branch if SYSGEN parameter specifies 


; no CRD interrupts. 

; Get addr of SBICONF for action routines. 
; Array of action routine vectors. 

; Locate mem and call action routines 


o re-enable CRD interrupts. 


t 
; Restore registers. 


PREPPPPRREEE 
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8) 


. ; -SBTTL Memory Frror Interrupts 
¢ ; SBI Alert interrupts are vectored here. 
A ; § OL AGN LONG 
A GBLDEF INT ; EXESINTS8:: or MPSSINTSS:: 
9 8 GBLDEF LOGSBA 3; EXESL OGSBA: : or MPS$LOGSBA:: 
OA 6B A 3 9 PUSHR #*M<RI, R3> 3; Save some registers. 
AR 9 SETIPL ss 2 ; Disable all interrupts. 
51 OB A D AD 35 OVAL 8(SP : Set pointer to interrupt PC,PSL. 
3. CUO B B1 9 MOVL otis Rsk i” Re ; Set SBI Alert error log 9 type 
001B B4 94 BSBW LOG ERROR MEM ; Log memory controller registers. 
OA BA B? 995 POPR bRZRT RSS ; Restore registers. 
2 B9 338 REI 
O3BA 998 
8 + 1000 | ; CRD (Soft, or Corrected) memory error interrupts are vectored here. 
038A 1909 * AL LGN LONG 
038C 1006 GBLDEF INT54 3; EXESINTS4:: or MPSSINTS4:: 
ater 44 GBLDEF LOGCRD : EXESLOGCRD:: or MPSSLOGCRD:: 
OA BB O38C 1005 USH #*M<R1,R3> 3; Save some registers. 
O3BE 1006 SETIPL #*X1F ; Disable all interrupts. 
0024'CF D6 O03C1 1007 INCL W*GL_CROCNT : Keep count of these errors. 
51 08 AE DE O3C5 1008 MOVAL (SPJ,R : Set pointer to interrupt PC,PSL. 
33 .C«‘ DO 03C9 1009 MOVL #EMBSK_SE,R3 : Set soft memory error type. 
000 30 O3CC 1010 BSBW L0G. ERROR. MEM : Log memory controller registers. 
OA BA O3CF 1011 POPR »R35 
02 03D1 1012 REI 


ee 4 
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-SBTTL LOGMEM Master Routine 


FUNCTIONAL DESCRIPTION: 
ee routine is called to build an vy cggteining the device 
registers of the memory controllers on an 11/780 system. If called 
at the LOG_ERROR_MEM entry roe it will scan the memory controller 
status registers, and te og those controllers which report errors. 
If called at the LOG_ALL_MEM entry point, it will unconditionally log 
all memory controllers on the system. 


INPUTS: 

R1 - ortho to exception PC,PSL 

R3 - Error log type code (e.g. EMBSK_type) 
OUTPUTS: 

Format of error log: 


# of memory controllers ‘gaged 
memory type-specific log # 
memory type-specific log #2 


4-4-4 -h-A- 14-1 4-4 _A_ AAA AA AAA AA 


PC of instruction at fault time 
PSL at fault time 


HAAN AAAI OPOPOROPOPOPONONOND | SS 


SONA NEAR 3S ODA NE WIN 9 OD NA UE WIN -2£ SO OD NOAMN EWI OO ODNOU EWN OQ OONOUS 


ALL registers are preserved. 


The error log buffer has been built on the stack; SP points to the beginning. 
Add the number of memory controllers logged, then log the errors. 
current register usage: 


WWAAIUNIAIAI AIAN AAI AIA AIAN ANIA AAAI AAAI AAAI AAAI IAI WAI NIAAA ANIA AIA AAW 


a ton Ion Bens Bons tons tn tn nt Bn ns Bs ns elas laslaslailailaslih-h-A-A-A-A-A-A-A-A-A-h-d d-dh) 
ee eee eee ee ee ee SS » 


—J 
aed 
SOOOOSOCOSOSOSOSOSOSOSOSOCSCOOOCOOSCOOOOOOOOOSOOOCOOOCOOOSOOOOOoOO 


0 
03 
03 
04 
Od 
043 LOG_ERROR_MEM: 3 Log controllers with errors. 
FFF 8F BB be POSHR #*M<RO,R1,R2,R3,R4,R5,R6,R7,R8,R9,R10,R11,AP> 
53 OO00'CF ODE 6 4 MOVAL WALOGERR_ OUT INES ,R3 : Array of action routine vectors. 
09 «11 : Oe BRB LOGMEM 3; Join common code. 
D 48 LOG_ALL_MEM: ; Yncond) t Tonal ty Log all controllers. 
1FFF 8F D 104 PUSHR #*M<RO,R1,R2,R3,R4,R5,R6,R7,R8,R9,R10,R11,AP 
53 0000'CF } 83 MOVAL W*LOGALL_ OUTINES ,R3 3; Array of action routine vectors. 
6 B LOGMEM: ; Log memory controller registers. 
55 7 6 5 CLRQ R5 ; lero error log byte count and number 
4 05 ; of controllers logged. 
57 00000000'GF 00 5 MOVL G*MMGSGL_SBICONF ,R7 :; For use by action routines. 
5¢ 601~—Sts«é#0 F 5 MOVL #SS$_NORMAL , AP ; Assume no fatal memory errors. 
: : Locate all memory controllers on the SBI. When a memory controller is 
59 ; found, call the appropriate action routine to create that controller's 
$ 3; portion of the common error log buffer on the stack. 
003c 30 6 ‘ BSBW = LOCATE_MEM 
6 
5 6 
6 
6 
: 


Sete Sete Ge Ge Ge Ge 


5 - Number of bytes in the error log. 
R6 - Number of memory controllers logged. 
SP - Points to the beginning of the error log buffer. 
AP - LBS if no fatal memory errors were discovered, else LBC. 
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Sow 
mm 
ee 
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oom 
WW 
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mn 


—_ 
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wr 
WHONMRY ®OMAG—hOWM 


MoOwooro7g-VcOVTI TT Oo 
WBOOfLMoowo 

Par DBPe-a—-warase-— 
SPrrererererereraerererererery 


ROM OMIM M MINES ON" 


> 


on-r-4 h Om™m 
en 


no 
are) 


DWV PF OE "NOu' YS bP 


ee] 


Get address of saved RO gn stack. 
Restore input value of R35. 

Restore input value of Ri. 

Add # of controllers to log buffer. 
Total # bytes in error log buffer. 
Were any memory registers logged? 
No. Skip call to error logger. 
Keep count of memory errors 

Use # bytes as input to LOGIT. 


Log the error. 

Remove error log buffer from stack. 
r if fatal error not signalled. 

»R8B,R9,R10,R11,AP> 


AL; Unrecoverable memory controller err 
#*°M<RO,R1,R2,R3,R4,R5,R6,R7,R8,R9,R10,R11,AP> 


~ 
So 


— 
bad 
oe 


ooCoooo 
FWNOA UNE OP  OWOONOU ES UT 


St: 


oooo: 
FRPP RRR PRPS 
Wrororornon 
CONONWOCO POL 


ow 
w> 


: ] 
Address of error log buffer. 
Always log memory errors. 
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ne ~SBTTL LOCATE_MEM Dispatching Routine 
Routine to locate memory controllers on 11/780 SBI. 
FUNCTIONAL DESCRIPTION: 

This routine scans an ever of adapter type codes that tell which 

adapters are attached to the SBI. When it finds a memory controller 

ape it dispatches to an action routine for that memory controller 

ype. 

INPUTS: 


R3 = address of action routine table; 1 action routine/memory controller 
Current format of action routine tables (the tables are created by the 

MEMORY_ROUTINES macro): 

(R35): self-relative offset to MS7 y action routine 

4(R35): self-relative offset to MA780 action routine 

8(R3): self-relative offset to MS780E action routine 


On entry to memory action routine: 

RO,R1 = local registers, not preserved across calls to action routines 
TR# of this i! controller 
not available to be used by action routines 
address of CONFREGL occey (If the 780 ever gets a BI, code 
must change, because TSTL assumes no high-order bits set.) 
R5S-AP = available; contents are preserved across calls to multiple 

action routines (i.e. can be used for global storage) 


COOOCOCOCOCOCOCOCOOOCOOOOOOSOOOoSoOoO m=z 


PRR R RRR RRR RRR RRR PRP PPP PEE 1 


~ 
SUS BS BP BE EB BF NWN NANI WINNWIWI AINA AAAI ANIA AANA EBS 


DO PANMMADA FOOCCOKOD Ss Sh Sh Sh Sh Sh Ss SS SS SS SS 


Note: an action routine may deposit a -1 in R2 to cause LOCATE_MEM 
to prematurely exit the memory scan loop (and not call any other 
memory action routines). 


OUTPUTS: 
RO-R4 destroyed. (Other registers may be destroyed by action routines.) 


LOCATE_MEM: 
~ MOVL G*EXESGL_CONFREGL,R4 ; Get address of CONFREGL. 
SUBL3 #1,G*EXESGL_NUMNEXUS,R2 ; Get index into nexus arrays. 


: Loop through all nexuses. If a memory controller is found at any of the 
3; nexus slots, then call the action routine associated with that memory. 


54 00000000 GF 
52  00000000'GF 01 


oso 
Wo 


a ee ee ee ee a ee a a a a ed dd 
ae a a tk ed dd dd dd td I I IOOOO 


PRR ARS FWWWWWWWIIIanonononononononononyd 3 2 3 BQO ODO D000000059 


NAME WN OOD NAMU ES WIN O OD NAN E WN OS OD NAME WIN 9 OONOAU EW O ONO 


COSCO COCSCDOOOOSOOSOOSOOOSOOOOOOOOO 
RRR 


2-99-99 9 9 a I 


51 6442 09 10$:  MOVL (R4)CR2I,R1 ; Get nexus device type from CONFREGL. 

14 «#1 BEQL $ ; Not a memory; go to next nexus. 

oooo'cF 12 51 493A LOCC R1,#MEMTYPCNT,W°MEMTYP ; Find type in memory type array. 
3; R1 <= addr of type code (if found). 

oc 13 BEQL 20$ ; Not a genery go to next nexus. 

51 12 Al QA MOVZBL MEMTYPCNT(R1),R1 ; Use offset to get general menety type. 
51 6341 O€ MOVAL (R3)CR1J,R1 3; Get self-relative address of action 
00 gi4! 16 JSB acR1)CR14 ; routine, and call it. 
E53 52 F4 20$ SOBGEQ R2,10$ ; Loop through all nexuses. 
05 RSB ; Return. 


MPMCH 
v04 


10 Al 


51. 6542 
30000000 8F 


- MACHIN 
ENAB Act 


Sooooooooo 


PRR RRR RRR RRR RRR RRP RR PPR PPP PPP PRE 


DDD PDP DSPs 


fo 


POV QOS FF VUTEC T TUE U ETE ETT U ETUC TE CTE CTU CTT CTE r err eevee i ere eD 
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mn Routines 


PTR oe Oo Se Se Ge Be Se Be Oe Be Se Oe Bs Se Se Se Se See 
+ 


11 

11 

11 

11 

i 

HE 

Hi 

11 

11 9 INPUTS: 
ni 
igi 
1165 ; OUTPUTS: 
1196 : 

H 

1168 & NAB_MS780C: 
1102 RSB 
0 viteectead ** 
HF 

ie $ ENAB ee 
| ae 
1198 RSB 


“SEP=1 SYSLOA.SRCJ 1) 


-SBTTL ENAB Action Routines 


FUNCTIONAL DESCRIPTION: 
These action routines re-enable CRD interrupts for each 11/780 memory 
controller. Memory types currently supported: 


MS780C (Local memory = 4k ond ban chips) 
MS780E Loreal memory = 64k ch 
MA7 (multiport memory) 


- TR# of this memory 
- address of EXE ONFREGL array 


$6 f- 
- address of MMGSGL_SBICONF array 


RO,R1 destroyed; all other registers preserved. 


3; That's it. 
3; That's it. 


(R5)CR2],R Get address of controller registers. 
#<MRCSM TET SREIMRCSM, HERIAF>, TeeR1) 3; Enable interrupts 

3 and clear error flags. 

3; That's it. 


ee ee oe 
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48 ! -SBTTL LOGMEM Action Routines 
46D sata! yr DESCRIPTION: 
One action routine tH gemory controller type follows. These 
cour ings create an 11/780 memory error Log entry. Currently, the 


(SP): 


error log entry for this. controller 
(null if no error for this memory) 


previous error log 


eocece > ooo > <o 
ecccece } ooce 


3+ 
} 3 
1204 ; 
rf 4 ! > 3 following memory controllers are supporte 
46D 1 5 : MS780C (local memory - 4K ond Ln chips) 
46D 1 3 $ MS780E gLoray memory = 64K ¢ 
rt 4 ! 3 § MA7 (multiport memory) 
46D 1211; Each action routine contributes to the common error Log buffer being 
46D 1 \§ 3 built on the stack. Because different routines are being used to build 
460 1215; a common error log buffer on the stack, the contents of the stack is 
rh 4 ! 13 ; significant at all times. 
46D 3 1 + INPUTS: 
46D 1217 ; R2 = nexus index for this memory (TR #) 
46D 1 Ht $ R35 - not available for use by action routine 
46D 1219; R4 = address of SBI configuration array (CONF REGL) 
046D 1220 ; RS = current errorlog byte count 
46D 1221; : = current number of controllers log oged 
46D 1 § 3 address of array of SBI virtual addresses (SBICONF) 
46D 1 : RB-R11 - scratch 
re¢4 ! : 3 AP = memory controller status: LBC = fatal controller error discovered 
gee 1 g : IMPLICIT INPUTS : 
46D 1 $ mama wenn mn orn none nr arora nee near ase woe ean ee ae Sa 
0460 1 3 : (SP): ' caller's return address H 
46D 1 3 + wer em wom monn enema m ona man ewan ea nmonnaame + 
46D 12350; H return to caller's caller : 
46D 1 13 fb co me COS BE OBEN Om ON + 
46D 1 § 3 H previous error log ; 
a3 RR : : 
Be owns: | | 
46D 1 $ : Rp-ns preserved 
46D 1 8 ; and R6 updated 
46D 1 3 
46D } rt 3; IMPLICIT OUTPUTS: 
1242 : 
1 rk : 
1244 ; 
' $2 3 
nie 
rk : 
1 39 : 
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s8p } 3 de -SBTTL LOG_MS780C 

rt 4 } ; LOG_MS780C - Build error log for MS780C memory controller 

46D 1 : The portion of the error log built for the MS780C memor troll 

if ! 8 : has the following format: ’ i ih acid 

rb} ' y 3 H adapter TR# H 

48 ! § 3 H memory register A i 

de> 1968 | TE Be. 

rts : 96 : H memory register C H 

46D 1 o8 ; Register A contains the type code in the low-order byte, For MS780C 

rhe} ! 29 3 memories, this type code is in the range of 8 - 11 (hex). 

46D 1271 * 

reed ! if LOG_MS780C: 

46D 1274 : Determine whether to log this controller. 

Be 18EF boc 

05 0460 1 Hy RSB ; Else return. 


J.11 
i oRREHE MEEK HCEPTLONvouen' FOR we NgsERigg BESTE PRIS Sete Aha muess OY ts| |S 


r | § vine -SBTTL LOG_MS780E 

r ! ¢ ; LOG_MS780E - Build error log for MS780E memory controller 

46E 1 § : The portion of the error log built for the MS780E memory controller 
rt ; } ; has the following format: 3 

4 : 8 : i adapter TR# i 

rs ; ! ° : ' memory register A ' 

rh: | § ; H memory register B H 

tee ! 5 ; : memory register C H 

46E 1 : : H memory register D ' 

tee 1339 Sapo pom eoe : 

46E 1340 ; Register A contains the thee code in the low-order byte. For MS780E 
BiGe : 4} 3 memories, this type code is in the range of 68 - 6C (hex). 

of it i 

ree : rf LOG_MS780E: 

ree : ‘3 : Determine whether to log any errors for this controller. 
046E 1354 LOGE: 

05 O046€ 1356 RSB ; Else return. 
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rt : ae -SBTTL LOG_MA780 

ri : ; LOG_MA780 = Build error log for MA780 memory controller 

46F : The portion of the error log built for the MA780 memory controller 

2 : ; has the following format: 

46F : adapter TR# 

ree : peewee wenn e ee ceeeesececeecesnt+ 

rs : : H Port Configuration Register : 

ast ; H Port Interface Control Reg H 

46F : | Port Controller Status Reg | 

46F : tecencecense= sonra nnnnnennsenn=+ 

46F 3 | Port Invalidation Control Reg ! 

46F : (eseccusncceuccccsesnccnssccoose$ 

46F : | Array Error Register ' 

46F ; a sone eeene-------4 

46F 3 ' Configuration Status Reg 0 ' 

46F ; a + 

re ; ! Configuration Status Reg 1 ; 

AGF : i Maintenance Control Register: 

6 ; 

6F : The Port Configuration Register contains the type code in the 
; low-order byte. For MA780 memories, this type code is in the 
3 range of 40 - 43 (hex). 
LOG_MA780: 


Determine whether to log any errors for this controller. 


58 6742 00 MOVL (R7)CR2],R8 3; Get VA of controller register. 
5A D4 CLRL R10 ; Use R10 as memory error flag; assume 
3; there is an error condition. 
68 00400000 8F 03 BITL #*x00400000, (R8) ; Check for power-up interrupt. 
Bs BNEQ 5$ ; Branch if found. 
04 AB FFOOOO0O BF OD BITL #*XFFO00000,4(R8) 3; Check Port Interface Control Reg. 
1 BNEQ 5$ ; Branch if found error. 
10 AS 10000000 8F OD BITL #MRCSM_ELSRF ,16(R8) 3 Check wif Foun ercer aregister. 
1 BNEQ 5$ 3: Branch if foun 
18 AB 00000400 8F 0D BITL #*x00000400, 24 (R8) 3 Check Multi a Interlock Accepted err. 
D «61 BNEQ 5$ 3; Branch if found erro 
08 AB p000C000 BF D BITL #*xD000C000,8(R8) 3; Lastly, check Port Contr. Status Reg. 
ss % BNEQ 5$ ; Branch if found error. 
5A ey $ MOVL #1,R10 ; Signal no errors found. 
01 5A Fe BLac R10,LOGMA 3; If any errors were found, log them. 


ee ee ed ed et dd st = = st +3 = 1 ss 
AAAAANAAANAAA MAA BEE EERE RARER EER ELL PEPE EPP EPP PPP PPP PPP PEE 


RPI 2 3 @§ @ 2QOODOGDO0 OO OOO OO 0009 69 09 09 69 0909 69 09 SI NIN NINN SIN NIPA AAA AAAAOun 
RO OO) 9 ODNAUE WN NAUE WIN @ OOO NAME WIN 0 ODNOAUE WIN (OO ONOU SW" 00 


5 
208: RSB ; Else return. 
This is the entry point used when unconditionally logging all memories. 


L_11 
rencnge “oMAGAIMG CMECK EXCEPTION WANDLER TOR WP Tg-SEP~H9Rs 82:11:08 YAR/ms Mere YOEOE mans1 29° 9,| (NG 


4AD 3 Byit¢ error log on stack. First set SP to where the top of the buffer 
4AD ; will be, and ye R9 as a temporary stack pointer while the Log is being 
4AD ; built. This is so the machine check grotec ion routines can freely use the 
rn ; Stack above where the error log is being built. 
4AD LOGMA: 
0802 8F BA OQ4AD POPR #*M<R1,R11> ; Get return address in R1, caller's 
481 ; return in R11. 
59 : 481 MOVL SP,R9 3; Use RY as tenporery stack pointer. 
SE 24 C2 (0484 SUBL  #<$e4>,SP : Point SP to where stack top will be. 
48 DSBINT stnid ; Raise IPL while Logging registers. 
79 if A D MOVL (RB) ,-(R9) 3; Maintenance Control Register 
79 «618 A Dd MOVL 4(RB) = (RI) ; Configuration Status Register 1 
79 «#61648 D MOVL OCRB) ,-(R9) ; Configuration Status Register 
79 «610 AB OD MOVL Ls {tle 4 ; Array Error Register 
79 «6©600C AB ODD MOVL 12(R8B) ,-(R9) 3: Port Invalidation Control Register 
79 O08 AB OD MOVL 8(RB) ,-(R9) ; Read Port Controller Status Register. 
79 «=©6000)—t—s«é 15$ MOVL #0,-(R9) ; Else put fake copy of register in log. 
79 04 re | dO MOVL 4(R8B) ,-(R9) : Port Interface Control Register 
79) = 6 dO MOVL (RB) ,-(R9) 3: Port Sony purer es Register 
ENBINT SRC=R10 ; Restore IPL to previous level. 
79 «652 ~=Coé OVL R2,-(R9) ; Save TR# in error log. 


Clear errors from registers. 


BISL 4(R9), (RB) 
BISL 8(R9) ,4(R8) 


BISL 12(R9) ,8(R8) 
BISL 24(R9) ,20(R8B) 


Clear errs in Port Config Reg (pwr-up) 
Clear errors in Port Interface 

Control Register. 

Clear errors in Port Controller 
Status register. 

Clear errors in Port Configuration 
Status Register (Mult Interlock Accpt) 


04 
08 AB «OC AD C8 
14 A8 18 A9 C8 


BERR RP PRP P PREP PPR PEPPER PPP PPP PEE 
RTH H HHH HMMMMMMMMoOOOCOCVCFFOOoWw 


Lr wWwDWDDDOWDomuumm onnnmwronnroewnroe ono 
ce ee ee ee ee ee a ed ed ed od ed — —  — — —  —  — —  — — — — — — —  — — —§ 
Pe en Oa] Oa lal tale ales AL eal AL eAn AL TAL AD AD A AD AL AD AD AD AD AD AD AL Ab AL AD AL AL AL AL AL AL AL AL AL AL AD AL AL AL AD AL AL AD AL AL AL AD AL AD Ah Abel 
+OG9 CS CD CSOD C9 C909 CD 09 Si NI NIN NS SOOO AAO TUT UT & SB IAI AIAN PPOPOFIPD 
OOO FW $0 OD NAUSEA 9 ODNAU ES WODWIN  O ODO NAUE WN NIP OOO NINO ODNOUSW 


14 A9 DD PUSHL 20(R9) Get copy of Array Error Register 
on top of stack. 
: Check for CRD error. If the # of recent CRD errors > CRDINTMAX, then disable 
; CRD interrupts for this control'er. If the # of recent CRD errors > 
3; CRDWATCHMAX, then don't log another CRD error for this controller. 
E 6E 1c «1 ; BBC #MRCSV_ELSRF,(SP),40$ ; Branch if this wasn't a data error. 
001 eres 56 INCB W°AB_MEWERRER ; Count data errors for this contr. 
03 0010°CF4 9 5 CMPB W*AB_MEMERRLR2) ,ACRDINTMAX : Too many CRD interrupts? 
4 15 304 BLEQ 30% : No, skip CRD in errupt isable. 
00 6€ —E €2 3 308 BBSS #MRCSV_INHBCRD,(SP),30$ ; Set bit to inhibit CRD interrupts. 
5A 01.051 " — MOVL = #1,R10 : Assume error will be logged. 
06 sahaelinal 91 051 CMPB W*AB_MEMERRCR2], #CRDWATCHMAX ; Too many CRD error logs? 
9 15 Q51 BLEQ 40$ ; No, go ahead and log this one. 
A 04 218 2 408 CLRL R10 3; Signal “‘don't log this error’. 
10 AB «BE DO 218 3 ; MOVL (SP)+,16(R8) 3; Clear errors from Array Error Reg. 
521 98; 
: 1 99 ; Note: If no machine check occurred, R9 and SP are now identical. We can 
: ! 8 ; resume using SP. 


00 SA EB } } 9 LOG. fas BLBS R10,LOG_MA ; Branch to log the error. 
5526 co 4 161 "ADDL =. #<9#4>, RS : Add # of bytes in this log to total. 
6 «OD g ! 17 exit ma INCL R6 :; Increment count of memories logged. 
58 09 2 9 1615 ~""PUSHL R11 3; Restore caller's caller to stack. 
61 1 52B 1616 JMP (R1) ; Return to caller. 
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ymbol table 

10 R ? GW_REENAB 2 ? 
iy mr aim ary 
BADTYPE 4p IBROMCHECK Ed 
SS _MPASYNCWRT RHERRERR x INTS8 As 4 
BUGS "MPBADMCK cereeeee INT3¢ 90 R 8 
BUGS” MPMCHECK RARRREARE x 8 nig r 8 
CACHEPARITY 00000134 R 1PLS SYNC 008 3 
steht am tdsitt ALL ROUTINES $60000 & 4 
CH$S_GOERRS = 000007 LOGALL_ 900 4 9 
CHSV-GOERRS = 00000003 LOGAWE i 2h4 
ae a Bie ib 
pia Dept see = ! LOGE 00046 R 08 
SOP eRe R AS! = B09; 0908 ERR_ROUTINES 0000000 R sé 
un seey = 60 08909 HOGER” 9000247 R 08 

H_REPAIR = 00¢ C00 LOGIT 
CHOREPAIR. 1 = 00814000 LOGMA D00004AD R 08 
cae ae Be ie 
riesee = Oooooips ROB tty a900¢00 R 08 
eine : i ait et 
CRDWATCHMAX = 00000006 ; OGER 90000302 R 08 
cata ets og ek ae 
EMBSB_MC_SUMCOD = 90000010 LOG=ms780¢ 9000460 R 08 
EMBSK-AW = 0000000 LOG» GO0046E R 08 
etd me titi MCHKSGL. LOG SOohsee kG Ook 
eresr he - 0900000¢ MCHKSM_COG * SSH) 
EMBSK SA = 0000000 MCHKSM aACK . 464 
EMBSK~SE = 00000006 ACHKSMONEX 9000004 
at = 00000004 MCHK_ERRCNT 4 

EAS RABD 90000460 R 08 MCL CES = 90000008 
ENAB-MS780C 0000045E ROB MCLCOUN = 90000000 
ENAB"MS780E 0000045F R sO aE = 90000014 
ENAB-ROUT INES 00000000 R sé MCL = 900000 
EXESGL. CONFREGL ceeeenee XxX OB mCL=PC = 9000008¢ 
Exe Sel FLAGS em fe MCL-SBIERR = 00000028 
EXESCL | _MCHKERRS Reeeeeee x 8 ACC -SUMAARY = 90000004 
EXESGL— _MEMERRS reeareeee x 5 te 0 - BhokoTs 
EXESGL~NUMNE XUS ceneeeee x ~TeERC : 
EXESGL TODR Rekekeee x MCL_TBER 9 : 8 8 § 
EXESGO”SYST IME teeeeere x MCL~TINOADD : 03 
EXE$GQ~TODCBASE cerecere x MCL UPC : 00¢ 
EXESMCRECK cereeeee =X TVA 19 
EXESV_CRDENABL cereeees x RERTYD _ 90000009 
xu itt ae ’ HAGEGL SBI CONF cneeeees 08 
eet ie = 00 SAB" MEMERR 00000010 
GL. BADTTMOU CR ? MP SSAB-RERER 00000010 
GL~CHIOLD 0000004 R ? MPSSALCOCE wot 8 
ae Hee ae se we 
eng 1 IRCA, oa 
BEET TA OR ? MPS$CL~CPTIMOUT CRG 07 
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MPMCHECK 
Symbol table 
MPSSGL 

MPSS 
MPSSSECBUGCHK 
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toosmeane eeeceerzrence $$ 


! ;_Psect synopsis ! 
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PSECT name Allocation PSECT No. Attributes 
- ABS . 00000000 < ) 0¢ 0.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 

$$ 0 %% ( -) 1 ¢ 1.) NOPIC USR CON ABS LCL NOSHR EXE RD WRT NOVEC BYTE 
YSMPDATAO 1 ( 18.) § ( ¢°3 NOPIC USR CON REL LCL NOSHR EXE RD WRT NOVEC LONG 
YSMPDATA OO0O0C (¢ 12.) i. Ban PIC USR CON REL LCL NOSHR EXE RD WRT NOVEC LONG 
YSMPDATA 8 8 Boe ( 12.) 4 ( 3°} PIC USR CON REL LCL NOSHR EXE RD WRT NOVEC LONG 
YSMPDATAG C ¢€ 12.) O5 ¢ 5.) NOPIC USR CON REL LCL NOSHR EXE RD WRT NOVEC G 
YSMPDATA1 44 ae) § ( 8° NOPIC USR CON REL LCL NOSHR' EXE’ R&D WRT NOVEC BYTE 
SSSSMPDATA 00000030 ( 48.) ( 7.) NOPIC USR CON REL LCL NOSHR EXE RD WRT NOVEC QUAD 
YYSMPCODE 0000054D ( 1357.) 08 ¢ 8.) NOPIC USR CON REL LCL NOSHR EXE RD WRT NOVEC QUAD 

deere eeeeae wees e ren ecreaen $+ 
H Performance indicators H 
Phase Page faults CPU Time Elapsed Time 
Initialization 29 00:00:00.09 00:00:01.04 
poanene processing 112 Se SS EL 00:00:07.91 
424 O) 288! 10. | ae et 
Synbol table sort 0 Be 20) 82 0:00:03.81 
s 2 234 00:00:04.56 00:00:12.8 

Svabot table output 23 8s S444 BR: BB 388 «! 
Psect synopsis output 4 00:00:00.06 00:00:00.1 
Cross-reference output 0 00:00: g- 38 88:80:09 09 
Assembler run totals 828 00:00:24.0 00:01:13.38 


the working set Limit was 1800 pages. 

7324 bytes (191 pages) of virtual memory were used to buffer the intermediate c 

fare were 60 pages of symbol table goees ai sgeeces to hold 1187 non-local and 53 tocol symbols. 
647 source Lines were read in Pass 1 "sein ts 30 object records in Pass 2. 

38 pages of virtual memory were used to define 33 macros. 


eet n enw eee em enews eewaen a} 


Macro Library name Macros defined 
So 32 SDUA fo Mee Ae Ce 16 
HELIN OBJJLIB.MLB;1 18 

~$52280UA SE Syst IBISTAR RLET.MLB;2 8 

TOTALS (all Libraries) 4 


1539 GETS were required to define 42 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1S$:MPMCHECK/OBJ=O0BJ$:MPMCHECK MSRC$:MPPREF IX/UPDATE=(ENHS :MPPREF IX) +MSRC$:MPSWT/UPDATE=(ENHS:MPSWT) +MASD$: CSYSLOA.SRC IMC 


024 AH-BT13A-SE : L EQUIPMENT CORPORATION 
VAX/VMS V4.0 | Aaa alt ASM 


